object Srv_KsxxSetForm: TSrv_KsxxSetForm
  Left = 192
  Top = 101
  Width = 722
  Height = 557
  BorderWidth = 6
  Caption = #32771#29983#20449#24687#26356#25913
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 702
    Height = 468
    Align = alClient
    Caption = #32771#29983#20449#24687#65306
    TabOrder = 0
    object dxDBGrid1: TdxDBGrid
      Left = 2
      Top = 16
      Width = 698
      Height = 450
      Bands = <
        item
        end>
      DefaultLayout = True
      HeaderPanelRowCount = 1
      KeyField = #23398#21495
      SummaryGroups = <>
      SummarySeparator = ', '
      Align = alClient
      PopupMenu = PopupMenu1
      TabOrder = 0
      DataSource = DataSource1
      Filter.Criteria = {00000000}
      OptionsDB = [edgoCanAppend, edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoUseBookmarks]
      OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoUseBitmap]
      object dxCol_Id: TdxDBGridColumn
        ReadOnly = True
        Width = 37
        BandIndex = 0
        RowIndex = 0
        FieldName = #24207#21495
      end
      object dxCol_Xh: TdxDBGridMaskColumn
        Width = 74
        BandIndex = 0
        RowIndex = 0
        FieldName = #23398#21495
      end
      object dxCol_Xm: TdxDBGridMaskColumn
        Width = 60
        BandIndex = 0
        RowIndex = 0
        FieldName = #22995#21517
      end
      object dxCol_Xb: TdxDBGridMaskColumn
        Width = 34
        BandIndex = 0
        RowIndex = 0
        FieldName = #24615#21035
      end
      object dxCol_Yx: TdxDBGridMaskColumn
        Width = 83
        BandIndex = 0
        RowIndex = 0
        FieldName = #38498#31995
      end
      object dxCol_Zy: TdxDBGridMaskColumn
        Width = 91
        BandIndex = 0
        RowIndex = 0
        FieldName = #19987#19994
      end
      object dxCol_Bj: TdxDBGridMaskColumn
        Width = 163
        BandIndex = 0
        RowIndex = 0
        FieldName = #29677#32423
      end
      object dxCol_Pwd: TdxDBGridMaskColumn
        Width = 59
        BandIndex = 0
        RowIndex = 0
        FieldName = #23494#30721
      end
      object dxCol_Kd: TdxDBGridMaskColumn
        BandIndex = 0
        RowIndex = 0
        FieldName = #25152#23646#32771#28857
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 468
    Width = 702
    Height = 43
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      702
      43)
    object btn_Refresh: TBitBtn
      Left = 546
      Top = 12
      Width = 75
      Height = 25
      Caption = #21047#26032'[&F]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = btn_RefreshClick
    end
    object btn_Exit: TBitBtn
      Left = 626
      Top = 12
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = #36864#20986'[&X]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 8
      OnClick = btn_ExitClick
    end
    object btn_Find: TBitBtn
      Left = 166
      Top = 12
      Width = 75
      Height = 25
      Caption = #26597#35810'[&S]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = btn_FindClick
    end
    object Edit1: TEdit
      Tag = 9999
      Left = 61
      Top = 14
      Width = 100
      Height = 22
      TabOrder = 1
    end
    object ComboBox1: TComboBox
      Tag = 9999
      Left = 4
      Top = 14
      Width = 51
      Height = 22
      ItemHeight = 14
      ItemIndex = 0
      TabOrder = 0
      Text = #23398#21495
      Items.Strings = (
        #23398#21495
        #22995#21517)
    end
    object btn_Add: TBitBtn
      Left = 242
      Top = 12
      Width = 75
      Height = 25
      Caption = #26032#22686'[&N]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = btn_AddClick
    end
    object btn_Edit: TBitBtn
      Left = 318
      Top = 12
      Width = 75
      Height = 25
      Caption = #20462#25913'[&E]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = btn_EditClick
    end
    object btn_Delete: TBitBtn
      Left = 470
      Top = 12
      Width = 75
      Height = 25
      Caption = #21024#38500'[&D]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = btn_DeleteClick
    end
    object btn_Save: TBitBtn
      Left = 394
      Top = 12
      Width = 75
      Height = 25
      Caption = #20445#23384'[&S]'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = btn_SaveClick
    end
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 183
    Top = 88
  end
  object PopupMenu1: TPopupMenu
    Left = 256
    Top = 176
    object N8: TMenuItem
      Caption = #26356#25913#32771#29983#22995#21517'[&N]'
      Visible = False
      OnClick = N8Click
    end
    object N9: TMenuItem
      Caption = '-'
      Visible = False
    end
    object N5: TMenuItem
      Caption = #35774#20026#32771#23436#20132#21367'[&E]'
      OnClick = N5Click
    end
    object N1: TMenuItem
      Caption = #35774#20026#25277#39064#37325#32771'[&R]'
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #35774#20026#25442#26426#32487#32771'[&C]'
      OnClick = N2Click
    end
    object N4: TMenuItem
      Caption = #35774#20026#33310#24330'[&W]'
      OnClick = N4Click
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object N6: TMenuItem
      Bitmap.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F000000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7F0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        0000FF7FFF7FFF7F0000007C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        007CFF7FFF7FFF7F007C007C007C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7F0000
        FF7FFF7FFF7FFF7F007C007C007C007CFF7FFF7FFF7FFF7FFF7FFF7F0000007C
        FF7FFF7FFF7FFF7FFF7F007C007C007C0000FF7FFF7FFF7FFF7F0000007CFF7F
        FF7FFF7FFF7FFF7FFF7FFF7F007C007C007C0000FF7FFF7F0000007C007CFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7F007C007C007C00000000007C007CFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F007C007C007C007C007CFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F0000007C007C007C0000FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7F0000007C007C007C007C007C0000FF7FFF7F
        FF7FFF7FFF7FFF7FFF7F00000000007C007C007CFF7FFF7F007C007C0000FF7F
        FF7FFF7FFF7FFF7F0000007C007C007C007CFF7FFF7FFF7FFF7F007C007C0000
        FF7FFF7FFF7FFF7F007C007C007C007CFF7FFF7FFF7FFF7FFF7FFF7F007C007C
        0000FF7FFF7FFF7F007C007C007CFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        007CFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7F}
      Caption = #25442#32771#22330#26381#21153#22120#32771#35797'[&S]'
      OnClick = N6Click
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object Excel1: TMenuItem
      Caption = #21517#21333#23548#20986#33267'E&xcel'
      OnClick = Excel1Click
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '*.xls'
    FileName = #24050#21442#21152#32771#35797#30340#32771#29983#21517#21333'.xls'
    Filter = 'Excel '#25991#20214'(*.xls)|*.xls'
    FilterIndex = 0
    Left = 296
    Top = 176
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    CommandText = 'select * from '#32771#29983#20449#24687#34920
    Params = <>
    ProviderName = 'Srv_DataSetProvider'
    RemoteServer = RDataForm.MyConnection
    AfterOpen = ClientDataSet1AfterOpen
    AfterClose = ClientDataSet1AfterClose
    OnCalcFields = ClientDataSet1CalcFields
    Left = 152
    Top = 88
    object ClientDataSet1Field: TIntegerField
      FieldKind = fkCalculated
      FieldName = #24207#21495
      Calculated = True
    end
    object ClientDataSet1CDSDesigner: TStringField
      FieldName = #23398#21495
      Size = 10
    end
    object ClientDataSet1CDSDesigner2: TStringField
      FieldName = #22995#21517
      Size = 8
    end
    object ClientDataSet1CDSDesigner3: TStringField
      FieldName = #24615#21035
      FixedChar = True
      Size = 2
    end
    object ClientDataSet1CDSDesigner4: TStringField
      FieldName = #38498#31995
    end
    object ClientDataSet1CDSDesigner5: TStringField
      FieldName = #19987#19994
      Size = 30
    end
    object ClientDataSet1CDSDesigner6: TStringField
      FieldName = #29677#32423
      Size = 50
    end
    object ClientDataSet1CDSDesigner7: TStringField
      FieldName = #23494#30721
    end
    object ClientDataSet1CDSDesigner8: TStringField
      FieldName = #25152#23646#32771#28857
      Size = 10
    end
  end
  object ClientDataSet2: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'Update_DataSetProvider'
    RemoteServer = RDataForm.MyConnection
    Left = 232
    Top = 88
  end
end
